(substring_both): Add missing address operator.

diff --git a/src/fns.c b/src/fns.c
index 7100ada4a6a449de4cb63573ce58f7f669e4fd35..f65375438faac40a8e535e8b7aaf17551690fcd0 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -1397,7 +1397,7 @@ substring_both (string, from, from_byte, to, to_byte)
                            string, make_number (0), res, Qnil);
     }
   else
-    res = Fvector (to - from, AREF (string, from));
+    res = Fvector (to - from, &AREF (string, from));
 
   return res;
 }